
> # set up environment ----
> library(data.table)

> library(ggplot2)

> library(cowplot)

> library(nnet)

> library(parallel)

> load("data/analysis_data.RData")

> source("R/00-functions.R")

> RNGkind("L'Ecuyer-CMRG")

> set.seed(1444055996)

> # main dataset ----
> data_main <- respondent_data[main == 1]

> model_main <- multinom(type2 ~ order, data = data_main)
# weights:  9 (4 variable)
initial  value 915.144036 
final  value 884.508186 
converged

> load("results/boots_main-type2.RData")
Error in load("results/boots_main-type2.RData") : 
  empty (zero-byte) input file
